{Titrator 3.00 is a chemical equilibrium calculator intended for use in aqueous }
{  systems with acid/base, complexation, dissociation, precipitation and }
{  electron transfer reactions. }

{  Titrator was designed primarily as a teaching tool for chemistry, }
{  biochemistry, geochemistry and environmental chemistry.  It is purely an }
{  equilibrium calculator, and lacks the database, transport, and kinetic  }
{  capabilities of more complex and sophisticated programs.  The user must }
{  provide the stoichiometry and log K value (or enthalpy and entropy) }
{  of each chemical species to be considered.}

{The algorithm is based upon the MicroQL logic of J. Westall, which in turn }
{   follows the algorithm in the MINEQL program of Westall and FMM Morel.}

{Currently documentation is incomplete, but may be useful and includes    }
{       TiManual        Users manual in .doc and .pdf                     }
{       TiTutorial      Tutorial based on a calcite system, .doc and .pdf }

{Current version 3.00, released under GPL by Steve Cabaniss, Dept. of Chemistry }
{  University of New Mexico, who can be contacted at cabaniss@unm.edu}

program Titrator;

{%ToDo 'Titrator.todo'}

uses
  Forms,
  TitrForm in 'TitrForm.pas' {Form1},
  TitrDefs in 'TitrDefs.pas',
  CompEdit in 'CompEdit.pas' {CompForm},
  HeaderEdit in 'HeaderEdit.pas' {HeaderForm},
  ParamEdit in 'ParamEdit.pas' {ParamForm},
  SpecEdit in 'SpecEdit.pas' {SpecForm},
  Titrate in 'Titrate.pas' {SweepForm},
  TitrHelp in 'TitrHelp.pas' {TitrHelpForm},
  Simulate in 'Simulate.pas' {SimulateForm},
  TiUncertain in 'TiUncertain.pas',
  MCAccess in 'MCAccess.pas' {MCForm};

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.CreateForm(TCompForm, CompForm);
  Application.CreateForm(THeaderForm, HeaderForm);
  Application.CreateForm(TParamForm, ParamForm);
  Application.CreateForm(TSpecForm, SpecForm);
  Application.CreateForm(TSweepForm, SweepForm);
  Application.CreateForm(TTitrHelpForm, TitrHelpForm);
  Application.CreateForm(TSimulateForm, SimulateForm);
  Application.CreateForm(TMCForm, MCForm);
  Application.Run;
end.
